\begin{tabbing} (\=((RepUR ``p{-}fun{-}exp do{-}apply`` ( 0)$\cdot$) \+ \\[0ex]CollapseTHEN (Fold `p{-}fun{-}exp` 0)$\cdot$) \\[0ex] \\[0ex]CollapseTHEN (RepUR ``p{-}id`` ( 0)$\cdot$)$\cdot$) \\[0ex]CollapseTHEN (((UnivCD) \\[0ex]CollapseTHENA (Auto$\cdot$)$\cdot$) \\[0ex] \\[0ex]CollapseTHEN ((ProveSqEq) \\[0ex]CollapseTHEN (Auto$\cdot$)$\cdot$)$\cdot$)$\cdot$ \- \end{tabbing}